home *** CD-ROM | disk | FTP | other *** search
/ Aminet 41 / Aminet 41 (2001)(Schatztruhe)[!][Feb 2001].iso / Aminet / dev / c / libiconv_src.lha / tests / check-translit.cmd < prev    next >
Encoding:
Text File  |  2000-11-07  |  441 b   |  21 lines
  1. /*
  2.  * check-translit 
  3.  *
  4.  *      Simple check of transliteration facilities.
  5.  *      Usage: check-translit SRCDIR FILE FROMCODE TOCODE
  6.  */
  7.  
  8. IF RxFuncQuery('SysLoadFuncs') THEN DO
  9.    CALL RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
  10.    CALL SysLoadFuncs
  11. END
  12.  
  13. '@echo off'
  14.  
  15. PARSE ARG srcdir file fromcode tocode
  16.  
  17. '.\iconv -f 'fromcode' -t 'tocode' < 'srcdir'\'file'.'fromcode' > tmp'
  18. 'cmp 'srcdir'\'file'.'tocode' tmp'
  19. 'rm -f tmp'
  20. EXIT
  21.